home *** CD-ROM | disk | FTP | other *** search
/ Galleria D'arte: Manet / Manet.iso / Dati / Theme1.dxr / Internal_3_Switch Mouseenter Collage.ls < prev    next >
Encoding:
Text File  |  2000-12-21  |  812 b   |  39 lines

  1. property pID
  2.  
  3. on getPropertyDescriptionList
  4.   pippo = the memberNum of sprite the currentSpriteNum
  5.   propertyDescriptionList = [#pID: [#comment: "ID dipinto (da 1 a 12)", #format: #integer, #default: 1]]
  6.   return propertyDescriptionList
  7. end
  8.  
  9. on mouseWithin me
  10.   set the blend of sprite the currentSpriteNum to 100
  11.   cursor(280)
  12.   dati = line pID of field "dati"
  13.   titolo = item 1 of dati
  14.   data = item 3 of dati
  15.   set the text of field "dida1" to titolo && "(" & data & ")"
  16.   updateStage()
  17. end
  18.  
  19. on mouseLeave me
  20.   set the blend of sprite the currentSpriteNum to 40
  21.   set the text of field "dida1" to " "
  22.   cursor(-1)
  23.   updateStage()
  24. end
  25.  
  26. on mouseDown me
  27.   cursor(280)
  28. end
  29.  
  30. on mouseUp me
  31.   global gID, gElencoOpere
  32.   cursor(-1)
  33.   gID = pID
  34.   preparascheda()
  35.   aggiungiBACK()
  36.   gElencoOpere = 0
  37.   go("scheda")
  38. end
  39.